home *** CD-ROM | disk | FTP | other *** search
/ BCI NET 2 / BCI NET 2.iso / archives / programming / c / amivogl-1.03.lzh / vogl / src / sunfort / farcs.c.Z / farcs.c
Encoding:
C/C++ Source or Header  |  1991-06-03  |  1.9 KB  |  147 lines

  1. #include "vogl.h"
  2.  
  3. /*
  4.  * circleprecision_
  5.  */
  6. void
  7. circleprecision_(prec)
  8.     int    *prec;
  9. {
  10.     circleprecision(*prec);
  11. }
  12.  
  13. /*
  14.  * arcprecision_
  15.  */
  16. void
  17. arcprecision_(prec)
  18.     int    *prec;
  19. {
  20.     circleprecision(*prec);
  21. }
  22. /*
  23.  * arc_
  24.  */
  25. void
  26. arc_(x, y, radius, startang, endang)
  27.     Coord    *x, *y, *radius;
  28.     int    *startang, *endang;
  29. {
  30.     arc(*x, *y, *radius, (Angle)*startang, (Angle)*endang);
  31. }
  32.  
  33. /*
  34.  * arci_
  35.  */
  36. void
  37. arci_(x, y, radius, startang, endang)
  38.     int    *x, *y, *radius;
  39.     int    *startang, *endang;
  40. {
  41.     arci((Icoord)*x, (Icoord)*y, *radius, (Angle)*startang, (Angle)*endang);
  42. }
  43.  
  44. /*
  45.  * arcs_
  46.  */
  47. void
  48. arcs_(x, y, radius, startang, endang)
  49.     short    *x, *y, *radius;
  50.     short    *startang, *endang;
  51. {
  52.     arcs(*x, *y, *radius, (Angle)*startang, (Angle)*endang);
  53. }
  54.  
  55. /*
  56.  * arcf_
  57.  */
  58. void
  59. arcf_(x, y, radius, startang, endang)
  60.     Coord    *x, *y, *radius;
  61.     int    *startang, *endang;
  62. {
  63.     arcf(*x, *y, *radius, (Angle)*startang, (Angle)*endang);
  64. }
  65.  
  66. /*
  67.  * arcfi_
  68.  */
  69. void
  70. arcfi_(x, y, radius, startang, endang)
  71.     int    *x, *y, *radius;
  72.     int    *startang, *endang;
  73. {
  74.     arcfi((Icoord)*x, (Icoord)*y, (Icoord)*radius, (Angle)*startang, (Angle)*endang);
  75. }
  76.  
  77. /*
  78.  * arcfs_
  79.  */
  80. void
  81. arcfs_(x, y, radius, startang, endang)
  82.     short    *x, *y, *radius;
  83.     short    *startang, *endang;
  84. {
  85.     arcfs(*x, *y, *radius, (Angle)*startang, (Angle)*endang);
  86. }
  87.  
  88. /*
  89.  * circ_
  90.  */
  91. void
  92. circ_(x, y, radius)
  93.     float    *x, *y, *radius;
  94. {
  95.     circ(*x, *y, *radius);
  96. }
  97.  
  98. /*
  99.  * circi_
  100.  */
  101. void
  102. circi_(x, y, radius)
  103.     int    *x, *y, *radius;
  104. {
  105.     circi((Icoord)*x, (Icoord)*y, (Icoord)*radius);
  106. }
  107.  
  108. /*
  109.  * circs_
  110.  */
  111. void
  112. circs_(x, y, radius)
  113.     short    *x, *y, *radius;
  114. {
  115.     circs(*x, *y, *radius);
  116. }
  117.  
  118. /*
  119.  * circf_
  120.  */
  121. void
  122. circf_(x, y, radius)
  123.     float    *x, *y, *radius;
  124. {
  125.     circf(*x, *y, *radius);
  126. }
  127.  
  128. /*
  129.  * circfi_
  130.  */
  131. void
  132. circfi_(x, y, radius)
  133.     int    *x, *y, *radius;
  134. {
  135.     circfi((Icoord)*x, (Icoord)*y, (Icoord)*radius);
  136. }
  137.  
  138. /*
  139.  * circfs_
  140.  */
  141. void
  142. circfs_(x, y, radius)
  143.     short    *x, *y, *radius;
  144. {
  145.     circfs(*x, *y, *radius);
  146. }
  147.